home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1999 May: Tool Chest / Developer CD Series Tool Chest (Apple Computer)(May 1999).iso / Tool Chest / Development Kits / MPW Related / DTS MPW Goodies / KeyMenu < prev    next >
Encoding:
Text File  |  1990-09-14  |  2.0 KB  |  60 lines  |  [TEXT/MPS ]
  1. # Key menu
  2.  
  3. Set Key     # cloverleaf
  4.  
  5. Set OldExit {Exit}
  6. Set Exit 0
  7. DeleteMenu {Key} ≥ Dev:Null
  8. Set Exit {OldExit}
  9.  
  10. Alias OldMPW "∂
  11.     AddMenu {Key} 'Old MPW Mode/3!' CurMPW ;∂
  12.     Set Commands '{OldCommands}' ;∂
  13.     Set AIncludes '{OldMPWPath}AIncludes:' ;∂
  14.     Set Libraries '{OldMPWPath}Libraries:' ;∂
  15.     Set CIncludes '{OldMPWPath}CIncludes:' ;∂
  16.     Set CLibraries '{OldMPWPath}CLibraries:' ;∂
  17.     Set PInterfaces '{OldMPWPath}PInterfaces:' ;∂
  18.     Set PLibraries '{OldMPWPath}PLibraries:' ;∂
  19.     Set RIncludes '{OldMPWPath}RIncludes:'" ;∂
  20.     Flush
  21. Alias CurMPW "∂
  22.     AddMenu {Key} 'Old MPW Mode/3' OldMPW ;∂
  23.     Set Commands '{Commands}' ;∂
  24.     Set AIncludes '{AIncludes}' ;∂
  25.     Set Libraries '{Libraries}' ;∂
  26.     Set CIncludes '{CIncludes}' ;∂
  27.     Set CLibraries '{CLibraries}' ;∂
  28.     Set PInterfaces '{PInterfaces}' ;∂
  29.     Set PLibraries '{PLibraries}' ;∂
  30.     Set RIncludes '{RIncludes}'" ;∂
  31.     Flush
  32.  
  33. AddMenu {Key} 'Old MPW Mode' OldMPW
  34. AddMenu {Key} 'Set Dir to Folder/«' 'DirActive'
  35. AddMenu {Key} '(-' ''
  36. AddMenu {Key} 'Source Menu' 'DeleteMenu Source; SourceMenu'
  37. AddMenu {Key} 'Mark C Routines'  'MarkC "{Active}"' 
  38. AddMenu {Key} 'Mark Pascal'  'MarkPascal "{Active}"'
  39. AddMenu {Key} 'Pasmat §' 'PasMatIt'
  40. # Run useful applications - make sure that they are all in your "{Commands}" path list
  41. AddMenu {Key} '(-' ''
  42. AddMenu {Key} 'Mouse MacApp' '"{MacApp}"Mouser "{MacApp}MouseApp"'
  43. AddMenu {Key} 'Mouser' '"{MacApp}"Mouser'
  44. AddMenu {Key} 'ViewEdit' '"{MacApp}"ViewEdit'
  45. AddMenu {Key} 'ResEdit' 'ResEdit'
  46. AddMenu {Key} 'FDA Mover' '"Font/DA Mover"'
  47. AddMenu {Key} (- ''
  48. AddMenu {Key} 'Open UserStartup/U' 'Open "{WorkFolder}UserStartup" ≥Dev:Null || Beep'
  49. AddMenu {Key} 'Close All/∑' 'Close -a -c'
  50. AddMenu {Key} 'Save All/ß' 'Save -a'
  51. AddMenu {Key} 'Trim {Active}/†' '∂
  52.     Mark -y § mark "{Active}" ;∂
  53.     Trim "{Active}" ;∂
  54.     Find mark "{Active}" ;∂
  55.     Unmark mark "{Active}"'
  56. AddMenu {Key} 'Zoom {Active}/ ' 'ZoomWindow "{Active}"'
  57. AddMenu {Key} 'Type Date/∂' 'Echo -n `Date -d -s` >"{Active}.§" && Find §Δ "{Active}"'
  58. AddMenu {Key} 'Eject/E' 'Eject 1 2 ≥Dev:Null'
  59. AddMenu {Key} 'RotateWindows/`' 'RotateWindows'
  60.